#!/bin/sh

 sunull                        \
    nt=500                     \
    dt=0.004                   \
    ntr=200                    \
| sushw                        \
    key=offset                 \
    a=-1000                    \
    b=10                       \
| suaddevent                   \
    v=1000                     \
    t0=0.05                    \
    type=lmo                   \
| suaddevent                   \
    v=1800                     \
    t0=0.8                     \
| sufilter                     \
    f=8,12,75,90 >data1.su

supsimage <data1.su >data1.ps

convert data1.ps data1.png

eog data1.png
